home *** CD-ROM | disk | FTP | other *** search
/ Computer Select (Limited Edition) / Computer Select.iso / dobbs / v16n09 / bob12.exe / T.BOB < prev    next >
Encoding:
Text File  |  1991-07-15  |  225 b   |  12 lines
  1. main()
  2. {
  3.     a = "ABCDabcd";
  4.     len = sizeof(a);
  5.     for (i = 0; i < len; ++i)
  6.     print(a[i],"\n");
  7.     for (i = 0; i < len; ++i)
  8.     if (a[i] >= 'a' && a[i] <= 'z')
  9.         a[i] = a[i] - 'a' + 'A';
  10.     print(a,"\n");
  11. }
  12.